home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Libris Britannia 4
/
science library(b).zip
/
science library(b)
/
DJGPP
/
DJLSR111.ZIP
/
libsrc
/
c
/
io
/
getw.c
< prev
next >
Wrap
C/C++ Source or Header
|
1993-06-28
|
569b
|
27 lines
/* This is file GETW.C */
/* This file may have been modified by DJ Delorie (Jan 1991). If so,
** these modifications are Coyright (C) 1993 DJ Delorie, 24 Kirsten Ave,
** Rochester NH, 03867-2954, USA.
*/
#if defined(LIBC_SCCS) && !defined(lint)
static char sccsid[] = "@(#)getw.c 5.2 (Berkeley) 3/9/86";
#endif LIBC_SCCS and not lint
#include <stdio.h>
getw(iop)
register FILE *iop;
{
register i;
register char *p;
int w;
p = (char *)&w;
for (i=sizeof(int); --i>=0;)
*p++ = getc(iop);
if (feof(iop))
return(EOF);
return(w);
}